home *** CD-ROM | disk | FTP | other *** search
/ Linux Cubed Series 3: Developer Tools / Linux Cubed Series 3 - Developer Tools.iso / devel / make / icmake-6.000 / icmake-6 / icmake / comp / multargs.c < prev    next >
Encoding:
C/C++ Source or Header  |  1994-02-08  |  647 b   |  24 lines
  1. /*
  2.                             M U L T A R G S . C
  3. */
  4.  
  5. #include "iccomp.h"
  6.  
  7. ESTRUC_ *multargs(left, right)
  8.     ESTRUC_
  9.         *left,
  10.         *right;
  11. {
  12.     register unsigned
  13.         count;
  14.  
  15.     count = ++left->type;                   /* get/increase # of args */
  16.                                             /* room for extra ESTRUC_ */
  17.     left->code = xrealloc(left->code, count * sizeof(ESTRUC_));
  18.     etoc(right);                            /* argument is code now */
  19.                                             /* right expression in array */
  20.  
  21.     *codestruc(left, count - 1) = *right;
  22.  
  23.     return (left);                          /* done */
  24. }